home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The CICA Windows Explosion!
/
The CICA Windows Explosion! - Disc 2.iso
/
programr
/
wtj007.zip
/
BAKER.ZIP
/
NETBIOS.ASM
next >
Wrap
Assembly Source File
|
1992-07-24
|
779b
|
35 lines
; NetBIOS.asm for use in Windows 3.x
; based on the Win32 specification
; author: Steven Baker (5-18-92)
;
; UCHAR or BYTE PASCAL FAR NetBIOS (PCNB Ncb);
;
; Implemented with prolog/epilog for Windows 3.0 real mode
; which may be removed for protected-mode only usage
_TEXT SEGMENT WORD PUBLIC 'CODE'
ASSUME CS: _TEXT
EXTRN NETBIOSCALL:far
PUBLIC NETBIOS
NETBIOS PROC far
inc bp ; Real-mode prolog
push bp
mov bp,sp
les bx,DWORD PTR [bp+6] ; Far pointer to our Ncb
call FAR PTR NETBIOSCALL
mov al,BYTE PTR es:[bx+1]
cmp al,0ffh ; 0ffh returned if asynchronous
jne nb1 ; request is accepted
xor ax,ax ; change to a result code of 0
nb1: mov sp,bp
pop bp
dec bp ; Real-mode epilog
ret 4
NETBIOS ENDP
_TEXT ENDS
END